Namespace Base
    Public Interface IBaseItem
        Property Link() As String
        Property Title() As String
        Property FeedName() As String
        Property Guid() As String
        Property Category() As String
    End Interface
    'Friend Class ItemBase
    '    Implements IBaseItem
    'Private FeedNV, FeedLiV, TitleV As String
    'Public Property FeedName() As String Implements IBaseItem.FeedName
    '    Get
    '        Return FeedNV
    '    End Get
    '    Set(ByVal value As String)
    '        FeedNV = value
    '    End Set
    'End Property
    'Public Property Link() As String Implements IBaseItem.Link
    '    Get
    '        Return FeedLiV
    '    End Get
    '    Set(ByVal value As String)
    '        FeedLiV = value
    '    End Set
    'End Property
    'Public Property Title() As String Implements IBaseItem.Title
    '    Get
    '        Return TitleV
    '    End Get
    '    Set(ByVal value As String)
    '        TitleV = value
    '    End Set
    'End Property
    'End Class
End Namespace